home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / RMH / Examples / tz.rexx < prev   
Encoding:
OS/2 REXX Batch file  |  2001-05-24  |  279 b   |  12 lines

  1. /* GetTZ() example */
  2.  
  3. l="rmh.library";if ~show("L",l) then;if ~addlib(l,0,-30) then exit
  4.  
  5. if GetTZ("TZ") then do
  6.     say "Timeznone:      " tz.tzstn
  7.     say "Timezone offset:" tz.timezone
  8.     if tz.daylight then say "Daylight:       " tz.tzdtn
  9. end
  10. else say "Can't find ENV:TZ"
  11.  
  12.